Namespace BEL.Servicio
    <Serializable()> _
    Public Class Formulario
        Implements System.IDisposable

#Region "Variables privadas"
        Private _co_formulario As System.Int32
        Private _co_encuesta As System.Int32
        Private _fe_fecha As System.DateTime
        Private _servicio As Servicio
        Private _EsNuevo As System.Boolean
        Private _detas As List(Of BEL.Servicio.DetalleFormulario)
#End Region
#Region "Constructor"
        Public Sub New()
            Me._co_formulario = 0
            Me._co_encuesta = 0
            Me._fe_fecha = [Date].Now
            Me._servicio = New BEL.Servicio.Servicio
            Me._detas = New List(Of BEL.Servicio.DetalleFormulario)
        End Sub
#End Region
#Region "Propiedades"
        Public Property CO_FORMULARIO() As System.Int32
            Get
                Return _co_formulario
            End Get
            Set(ByVal value As System.Int32)
                _co_formulario = value
            End Set
        End Property
        Public Property CO_ENCUESTA() As System.Int32
            Get
                Return _co_encuesta
            End Get
            Set(ByVal value As System.Int32)
                _co_encuesta = value
            End Set
        End Property
        Public Property FE_FECHA() As System.DateTime
            Get
                Return _fe_fecha
            End Get
            Set(ByVal value As System.DateTime)
                _fe_fecha = value
            End Set
        End Property
        Public Property SERVICIO() As BEL.Servicio.Servicio
            Get
                Return _servicio
            End Get
            Set(ByVal value As BEL.Servicio.Servicio)
                _servicio = value
            End Set
        End Property
        Public Property DETALLES() As List(Of BEL.Servicio.DetalleFormulario)
            Get
                Return _detas
            End Get
            Set(ByVal value As List(Of BEL.Servicio.DetalleFormulario))
                _detas = value
            End Set
        End Property
#End Region
#Region "IDisposable Members"
        Public Sub Dispose() Implements IDisposable.Dispose
            GC.Collect()
        End Sub
#End Region
#Region "IGenerico Members"
        Public Property EsNuevo() As System.Boolean
            Get
                Return _EsNuevo
            End Get
            Set(ByVal value As System.Boolean)
                _EsNuevo = value
            End Set
        End Property
#End Region
    End Class
End Namespace